(defn twelve-tone-row [pitches]
  (import [abjad [f TwelveToneRow]])
  (setv row (TwelveToneRow pitches))
  (f row))



